home *** CD-ROM | disk | FTP | other *** search
/ Popular Request / By Popular Request (Arsenal Computer)(SysOptics Distribution System).ISO / amiga3 / ppshow40.lha / PPShow / Install next >
Text File  |  1994-01-31  |  2KB  |  75 lines

  1. ; Install script for PPShow
  2.  
  3. (set old_level @user-level)
  4. (set @default-dest "")
  5.  
  6. (set reqtoolslib "libs/reqtools.library")
  7. (set pplib "libs/powerpacker.library")
  8. (set ppshow "PPShow")
  9.  
  10. ;=============================================================================
  11. ; English strings
  12.  
  13. (set default_lang 4)
  14.  
  15. (set #bad-kick
  16. (cat "You must be using Kickstart 2.04 to install using this script!"
  17. ))
  18.  
  19. (set #copying-reqtools     "Copying reqtools.library to Libs:...")
  20. (set #copying-powerpacker  "Copying powerpacker.library to Libs:...")
  21.  
  22. (set #where-ppshow "In which drawer should PPShow be installed ?")
  23.  
  24. (set #install-msg
  25. (cat "\n\nPPShow installation script.\n"
  26.      "This script installs PPShow on your Amiga.\n\n"
  27.      "Read the documentation for more information\n"
  28.      "on the distribution of PPShow.\n\n"
  29.      "PPShow ⌐ 1991-1994 Nico Franτois\n"
  30.      "All rights reserved."
  31. ))
  32.  
  33. ;=============================================================================
  34. ; make sure we are running under a 2.04 ROM
  35.  
  36. (if (< (/ (getversion) 65536) 37)
  37. (
  38.     (abort #bad-kick)
  39. ))
  40.  
  41. ;=============================================================================
  42.  
  43. (message #install-msg)
  44.  
  45. (copylib
  46.     (prompt "\n" #copying-reqtools)
  47.     (help @copylib-help)
  48.     (source reqtoolslib)
  49.     (dest "Libs:")
  50.     (confirm)
  51. )
  52.  
  53. (copylib
  54.     (prompt "\n" #copying-powerpacker)
  55.     (help @copylib-help)
  56.     (source pplib)
  57.     (dest "Libs:")
  58.     (confirm)
  59. )
  60.  
  61. (set ppshowdir
  62.     (askdir
  63.         (prompt #where-ppshow)
  64.         (help @askdir-help)
  65.         (default "C:")
  66.     )
  67. )
  68.  
  69. (copyfiles
  70.     (source ppshow)
  71.     (dest ppshowdir)
  72.     (infos)
  73.     (noposition)
  74. )
  75.